int sxbsc(int i,int v[],int *p)
{
    int j,n;
    n=*p;
    if((i<1) || (i>n))
      return (0);
    else
    {  for(j=i;j<n;j++)
	 v[j-1]=v[j];
       *p=--n;
       return (1);
    }
}
main()
{  static int a[]={3,2,7,1,9};
   int i,n=5;
   scanf("%d",&i);
   sxbsc(i,a,&n);
   for(i=0;i<n;i++)
     printf("%d,",a[i]);
   printf("\nn=%d\n",n);
}